home *** CD-ROM | disk | FTP | other *** search
Modula Definition | 1988-08-16 | 751 b | 19 lines |
- DEFINITION MODULE M2Kermit;
- (************************************************************************)
- (* This is the main body of the Modula-2 Kermit version. It reads a *)
- (* command line and interprets it *)
- (* written: 09.01.86 Matthias Aebi *)
- (* last modification: 17.03.86 Matthias Aebi *)
- (************************************************************************)
-
- EXPORT QUALIFIED Param1, Param2, VersionStr;
-
- CONST
- VersionStr = "Modula-2 Kermit, Version 1.0 / Lilith";
-
- VAR
- Param1 : ARRAY [0..31] OF CHAR; (* 1st & 2nd parameter we found *)
- Param2 : ARRAY [0..31] OF CHAR; (* on the command line *)
-
- END M2Kermit.
-